home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Mac Game Programming Gurus / TricksOfTheMacGameProgrammingGurus.iso / More Source / C⁄C++ / Xconq 7.0d37 / source / test / nonrand.g < prev    next >
Encoding:
Text File  |  1994-03-17  |  741 b   |  64 lines  |  [TEXT/R*ch]
  1. (game-module "nonrand"
  2.   (title "Non-Random")
  3.   (blurb "This is a special period that has no randomness at all.")
  4. )
  5.  
  6. (unit-type bm (name "Blanc-Mange") (image-name "mound")
  7. )
  8.  
  9. (unit-type kp (name "killer pancake") (image-name "saucerpad")
  10. )
  11.  
  12. (terrain-type |outer space| (color "navy blue"))
  13.  
  14. (add u* acp-per-turn 1)
  15.  
  16. (add u* speed 1)
  17.  
  18. ;;; Hits always occur.
  19.  
  20. (table hit-chance
  21.   (u* u* 100)
  22. )
  23.  
  24. (table damage
  25.   (u* u* 1)
  26. )
  27.  
  28. (set see-all true)
  29.  
  30. (add u* see-always true) ; redundant
  31.  
  32. (area 30 30)
  33.  
  34. (area (terrain
  35.   "30a"
  36.   "30a"
  37.   "30a"
  38.   "30a"
  39.   "30a"
  40.   "30a"
  41.   "30a"
  42.   "30a"
  43.   "30a"
  44.   "30a"
  45.   "30a"
  46.   "30a"
  47.   "30a"
  48.   "30a"
  49.   "30a"
  50.   "30a"
  51.   "30a"
  52.   "30a"
  53.   "30a"
  54.   "30a"
  55. ))
  56.  
  57. (side (name "BM"))
  58.  
  59. (side (name "KP"))
  60.  
  61. (bm 10 10 1)
  62.  
  63. (kp 12 12 2)
  64.